package cc.rengu.igas.mcps.core.service.base;


import cc.rengu.igas.mcps.common.constant.McpsParamConstant;
import cc.rengu.igas.mcps.common.constant.McpsTreeNodeConstant;
import cc.rengu.igas.mcps.common.enums.RespCodeEnum;
import cc.rengu.igas.mcps.core.realize.PosPublicCheckService;
import cc.rengu.igas.mcps.core.realize.impl.PosPublicCheckServiceImpl;
import cc.rengu.igas.share.common.constant.TransCacheConstant;
import cc.rengu.igas.share.core.model.MchntFeeInfo;
import cc.rengu.igas.share.core.model.MchntInfo;
import cc.rengu.igas.share.core.realize.MchntService;
import cc.rengu.igas.share.core.realize.impl.MchntServiceImpl;
import cc.rengu.igas.share.core.realize.impl.RiskMonitorServiceImpl;
import cc.rengu.oltp.service.base.BizBaseService;
import cc.rengu.oltp.service.common.constant.AppParamConstant;
import cc.rengu.oltp.service.common.constant.TreeNodeConstant;
import cc.rengu.oltp.service.common.entity.SysParam;
import cc.rengu.oltp.service.model.BizException;
import cc.rengu.oltp.service.model.BizResponse;
import cc.rengu.oltp.service.model.RiskMonitorInfo;
import cc.rengu.oltp.service.realize.RiskMonitorService;
import cc.rengu.oltp.service.realize.SysParamService;
import cc.rengu.oltp.service.realize.impl.SysParamServiceImpl;
import cc.rengu.oltp.utility.annotation.BIZ_AFTER;
import cc.rengu.oltp.utility.annotation.BIZ_BEFORE;
import cc.rengu.oltp.utility.annotation.BIZ_PROCESS;
import cc.rengu.oltp.utility.util.*;
import com.alibaba.fastjson.JSON;

import java.util.List;
import java.util.Optional;
import java.util.stream.Collectors;

/**
 * 线上支付服务基类
 * Created by 王成 on 2018/4/17.
 */
public abstract class C2BPayService extends BizBaseService {
    @Override
    protected Object beforeBizProcess() throws Exception {
        XmlTreeUtil xmlTreeUtil = new XmlTreeUtil();
        String channelId = xmlTreeUtil.getXmlTreeStringValue(TreeNodeConstant.TRANS_CHANNEL_ID);
        String transAmt = xmlTreeUtil.getXmlTreeStringValue(McpsTreeNodeConstant.TRANS_AMT);

        /* 金额不允许出现负数金额及0金额 */
        if (!StringUtil.isEmptyOrNull(transAmt) && AmountUtil.compare(transAmt, "0") <= 0) {
            rglog.error("金额不合法,{}", transAmt);
            throw new BizException(RespCodeEnum.REQUEST_ERROR.getRespCode(), RespCodeEnum.REQUEST_ERROR.getRespDesc());
        }
        xmlTreeUtil.setXmlTreeStringValue(TreeNodeConstant.ORDER_AMT, transAmt);

        /* Step1：查找BIZ_BEFORE的注解*/
        invokeBizAnnoMethod(BIZ_BEFORE.class);

        /* Step2：金融类交易公共校验 */
        PosPublicCheckService posPublicCheckService = new PosPublicCheckServiceImpl();
        if (McpsParamConstant.REQ_NPOS_ID.equals(channelId)) {
            /* Step2.1：mac验签，地理位置校验，sn校验，签到校验 */
            posPublicCheckService.posPublicCheckService();
            /* Step2.2：商户和终端的业务权限校验 */
            posPublicCheckService.posPublicAuthCtrlCheckService(txnInfo);
        } else if (McpsParamConstant.REQ_ILLT_ID.equals(channelId)) {
            /* Step2.1：大型智能终端公共校验 */
            posPublicCheckService.illtPublicCheckService();
            /* Step2.2：商户和终端的业务权限校验 */
            posPublicCheckService.posPublicAuthCtrlCheckService(txnInfo);
        } else if (!McpsParamConstant.REQ_H5_ID.equals(channelId)) {
            rglog.error("请求渠道<{}>不支持!", channelId);
            throw new BizException(RespCodeEnum.REQUEST_ERROR.getRespCode(), RespCodeEnum.REQUEST_ERROR.getRespDesc());
        }

        /* Step3：交易处理前客户化 */
        return bizBeforeCust();
    }

    @Override
    protected BizResponse callBizService(Object request) throws Exception {
        XmlTreeUtil xmlTreeUtil = new XmlTreeUtil();
        String instId = xmlTreeUtil.getXmlTreeStringValue(TreeNodeConstant.INST_ID);
        String mchntNo = xmlTreeUtil.getXmlTreeStringValue(McpsTreeNodeConstant.MCHNT_NO);

        /* Step1：判断商户等级:小微商户不支持磁条卡交易 */
        MchntService mchntService = new MchntServiceImpl();
        MchntInfo mchntInfo = mchntService.getMchntInfo(instId, mchntNo);
        if (null == mchntInfo) {
            rglog.error("查询商户信息失败<{}>", mchntNo);
            throw new BizException(RespCodeEnum.MCHNT_INFO_NOT_FOUND.getRespCode(), RespCodeEnum.MCHNT_INFO_NOT_FOUND.getRespDesc());
        }

        /* Step2：获取商户的费率信息 */
        if (AppParamConstant.NO.equals(mchntInfo.getIndependentDataFlag()) && "11".equals(mchntInfo.getMchntType())) {
            mchntNo = mchntInfo.getChainMchntNo();
        }
        List<MchntFeeInfo> mchntFeeInfoList = mchntService.getMchntFeeInfo(instId, mchntNo);
        if (null == mchntFeeInfoList || mchntFeeInfoList.isEmpty()) {
            rglog.error("获取商户<{}>扣率失败!", mchntNo);
            throw new BizException(RespCodeEnum.MCHNT_FREE_NOT_EXIST.getRespCode(), RespCodeEnum.MCHNT_FREE_NOT_EXIST.getRespDesc());
        }
        Optional<MchntFeeInfo> mchntFeeInfoOpt = mchntFeeInfoList.stream().filter(item -> item.getFeeInputMode().equals("0")).findFirst();
        MchntFeeInfo mchntFeeInfo;
        /* Step2.1：特殊费率商户 */
        if (mchntFeeInfoOpt.isPresent()) {
            mchntFeeInfo = mchntFeeInfoOpt.get();
            if ("02".equals(txnInfo.getSrcTxnAuthCfg().getBizType())) {
                /* Step2.2.1：区分借贷记卡，条码第三位可以区分借贷类型，如果数值小于4借记卡，数值大于4是贷记卡 */
                String qrCode = xmlTreeUtil.getXmlTreeStringValue(McpsTreeNodeConstant.QR_AUTH_CODE);
                if (AmountUtil.compare(qrCode.substring(2, 3), "4") == 1) {
                    xmlTreeUtil.setXmlTreeStringValue(McpsTreeNodeConstant.QR_CODE_TYPE, "C");
                } else {
                    xmlTreeUtil.setXmlTreeStringValue(McpsTreeNodeConstant.QR_CODE_TYPE, "D");
                }
            }
        } else {
            /* Step2.2：非特殊计费商户，过滤有效的费率记录 */
            mchntFeeInfoList = mchntFeeInfoList.stream().filter(item -> item.getFeeEffectiveDate().compareTo(DateUtil.getCurrentDate()) <= 0 &&
                    item.getFeeExpiryDate().compareTo(DateUtil.getCurrentDate()) >= 0).collect(Collectors.toList());
            /* Step2.3：根据业务细分区分是交易类型 */
            if (AppParamConstant.DEFAULT_BIZ_TYPE.equals(txnInfo.getSrcTxnAuthCfg().getBizType())) {
                /* Step2.3.1：微信条码支付 */
                mchntFeeInfoOpt = mchntFeeInfoList.stream().filter(item -> "04".equals(item.getFeeType()) &&
                        item.getBaseProdCode().equals(txnInfo.getSrcTxnAuthCfg().getBizProdCode())).findFirst();
            } else if ("01".equals(txnInfo.getSrcTxnAuthCfg().getBizType())) {
                /* Step2.3.2：支付宝条码支付 */
                mchntFeeInfoOpt = mchntFeeInfoList.stream().filter(item -> "05".equals(item.getFeeType()) &&
                        item.getBaseProdCode().equals(txnInfo.getSrcTxnAuthCfg().getBizProdCode())).findFirst();
            } else {
                /* Step2.3.3：银联条码支付 */
                String qrCode = xmlTreeUtil.getXmlTreeStringValue(McpsTreeNodeConstant.QR_AUTH_CODE);
                /* Step2.3.4：区分借贷记卡，条码第三位可以区分借贷类型，如果数值小于4借记卡，数值大于4是贷记卡 */
                if (AmountUtil.compare(qrCode.substring(2, 3), "4") == 1) {
                    xmlTreeUtil.setXmlTreeStringValue(McpsTreeNodeConstant.QR_CODE_TYPE, "C");
                    mchntFeeInfoOpt = mchntFeeInfoList.stream().filter(item -> "03".equals(item.getFeeType()) &&
                            item.getBaseProdCode().equals(txnInfo.getSrcTxnAuthCfg().getBizProdCode())).findFirst();
                } else {
                    xmlTreeUtil.setXmlTreeStringValue(McpsTreeNodeConstant.QR_CODE_TYPE, "D");
                    mchntFeeInfoOpt = mchntFeeInfoList.stream().filter(item -> "13".equals(item.getFeeType()) &&
                            item.getBaseProdCode().equals(txnInfo.getSrcTxnAuthCfg().getBizProdCode())).findFirst();
                }
            }
            mchntFeeInfo = mchntFeeInfoOpt.orElse(mchntFeeInfoList.get(0));
        }
        rglog.info("商户付费率信息:<{}>", JSON.toJSONString(mchntFeeInfo));
        GlobalTransUtil.setCacheValue(TransCacheConstant.MCHNT_FEE_INFO, mchntFeeInfo);

        /* Step3：设置订单默认有效时间 */
        String orderLife = xmlTreeUtil.getXmlTreeStringValue(McpsParamConstant.ORDER_EXPIRY_TIME);
        if (StringUtil.isEmptyOrNull(orderLife)) {
            SysParamService sysParamService = new SysParamServiceImpl();
            SysParam sysParam = sysParamService.getSysParamInfo(instId, McpsParamConstant.NORMAL_TXNKEY_PREFIX, McpsParamConstant.ORDER_LIFE);
            /* Step3.1：若未配置订单有效期，则默认为180秒 */
            orderLife = null == sysParam ? "180" : sysParam.getParamValue().trim();
            xmlTreeUtil.setXmlTreeStringValue(McpsParamConstant.ORDER_EXPIRY_TIME, orderLife);
        }

        /* Step4：查找BIZ_PROCESS的注解 */
        invokeBizAnnoMethod(BIZ_PROCESS.class);

        /* Step5：业务逻辑处理*/
        return bizProcessCust(request);
    }

    @Override
    protected void afterBizProcess(BizResponse response) throws Exception {
        /* Step1：查找BIZ_AFTER的注解 */
        invokeBizAnnoMethod(BIZ_AFTER.class);

        /* Step2：业务调用后客户化处理 */
        bizAfterCust(response);
    }

    @Override
    protected RiskMonitorInfo getRiskMonitorInfo() {
        RiskMonitorInfo riskMonitorInfo = new RiskMonitorInfo();
        RiskMonitorService riskMonitorService = new RiskMonitorServiceImpl();
        riskMonitorInfo.setTransMonitor(riskMonitorService);
        return riskMonitorInfo;
    }

    /**
     * 业务处理前客户化处理
     *
     * @return 业务处理实体类
     */
    protected abstract Object bizBeforeCust() throws Exception;

    /**
     * 业务逻辑处理客户化处理
     *
     * @param request 业务处理前的返回实体类
     * @return 业务处理结果
     */
    protected abstract BizResponse bizProcessCust(Object request) throws Exception;

    /**
     * 业务处理后逻辑处理
     *
     * @param response 业务调用响应信息
     */
    protected abstract void bizAfterCust(Object response) throws Exception;
}
